﻿Module ObjExt
    <Runtime.CompilerServices.Extension()> _
    Public Function DocID(ByVal aobj As Object) As Long
        Return OpenArchive.System.ArchiveSystem.WeakReferenceList.GetDocID(aobj.GetHashCode)
    End Function
End Module
